home *** CD-ROM | disk | FTP | other *** search
/ PCMania 32 / PCMania CD32_2.iso / bioforge / script / chaos.scp < prev    next >
Text File  |  1995-02-28  |  2KB  |  180 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7. { CHAOS_LOAD
  8. ^åû = $âç 
  9.  
  10. ^ç₧ = 0
  11.  
  12.  
  13. I ^ç╖ AND ^çí THEN
  14. {
  15. I @Ç¢ HALMECHO THEN
  16. {
  17. K 
  18. ^çí = $üé 
  19. }
  20.  
  21.  
  22. }
  23.  
  24.  
  25. @Ç¢ PLAYER
  26. I @Ç⌐ LEXMIR THEN
  27. {
  28. ^àï = @Çì REFLECTBATTDRAIN
  29. }
  30.  
  31. I ^ï¿ = 1 THEN
  32. ^Åì = @Çì BIOREPAIR
  33.  
  34. ^ï║ = 0
  35. ^ï╜ = 0
  36.  
  37.  
  38.  
  39. @Ç¥ SETCELLONEBARS ^åê 
  40. @Çì CELLTWOBARS
  41. @Ç¥ SETCELLTHREEBARS ^åè 
  42. @Ç¥ SETCELLFOURBARS ^åï 
  43. @Çì CELL3_MON
  44. @Çì FLICKER_LIGHT
  45. @Çì BLOCK_DRIP
  46. @Çì ANIMGUARD
  47. @Çì ANIMCRYO
  48. @Çì LEVEL1TREMORS
  49. @Çì ESCHERS_PLEES_FOR_HELP
  50. I ^è╣ THEN
  51. @Çì FIDO_REACTIVATE
  52.  
  53. I ^à« = 1 THEN
  54. ^Çä = @Çì POUR_LOOP
  55.  
  56. I ^== 0 THEN
  57. {
  58. ƒ CE21 ON
  59. ƒ CE22 ON
  60. ƒ CE23 OFF
  61. ƒ CE24 OFF
  62. }
  63. E 
  64. {
  65. ƒ CE21 OFF
  66. ƒ CE22 OFF
  67. ƒ CE23 ON
  68. ƒ CE24 ON
  69. }
  70.  
  71. I @Ç¢ HALMECHO THEN
  72. {
  73. Y HAL1 HAL2 HAL3 HAL4 HAL5 HAL6 ELH1 ELH2
  74. I ^碠THEN G WAY_PT2
  75. }
  76.  
  77.  
  78.  
  79.  
  80. @Çì READY_CAYNAN 
  81. @Çì READY_GUARD1 
  82.  
  83.  
  84. I @Ç¢ USE_BOT THEN
  85. {
  86. A OFF
  87. r CURFIG OFF
  88. Z CURFIG OFF
  89. u CURFIG ON
  90. è ON
  91. ï PLAYER
  92.  
  93. I ^å╗ != 4 THEN
  94. G UBOTLOC
  95.  
  96.  
  97.  
  98. ª USEALTI MAXIMUM
  99.  
  100. I ^ïá = 0 THEN
  101. {
  102. £ 0
  103. q DEACTIVATED 0
  104. o 
  105. }
  106. ¥ AVDBAR1 110
  107. ¥ AVDBAR2 110
  108. ¥ AVDBAR3 110
  109. ¥ AVDBAR4 110
  110. ¥ WAY_PT2 180
  111. ¥ GETMEAT 80
  112. }
  113.  
  114. I ^è╣ = 0 AND ^ǃ = 1 THEN
  115. I @Çó ^Ç₧ = $üé THEN
  116. ^Ç₧ = @Çì DOCRYOWARNING
  117. }
  118. { ENTERCELL2
  119.  
  120. @Ç¢ PLAYER 
  121.  
  122. Z CURFIG OFF
  123. u CURFIG OFF
  124. M STAND FREEZE
  125. I ^== 0 THEN
  126. C CE22
  127. E 
  128. C CE24
  129. £ TANKCMB 
  130. â 
  131. £ TANKCMB
  132. â 
  133. M MANTLE_9
  134. M STAND CONTINUE
  135. u CURFIG ON
  136. G CELL2WAY WALK
  137.  
  138. Z CURFIG ON
  139. I ^= $üâ THEN
  140. @Çì ACTIVATE_GUARD1
  141. E 
  142. {
  143. A ON
  144. C UNLOCK
  145. }
  146. }
  147. { FM_TNKS
  148.  
  149.  
  150.  
  151. @Ç¢ GUARD1
  152. o 
  153. @Ç¢ PLAYER
  154. A OFF
  155. Z CURFIG OFF
  156.  
  157. @Çì CELL2TOTANK
  158. }
  159. { LEGALTODROPHERE
  160. P ~ÇÇ 
  161. ~ÇÇ = 1
  162. I @Çí CURFIG NASTY1 THEN
  163. ~ÇÇ = 0
  164. I @Çí CURFIG NASTY2 THEN
  165. ~ÇÇ = 0
  166. é ~ÇÇ 
  167. }
  168. { LEX_PUT_DOWN_LTHAND
  169. I @Ç¥ LEGALTODROPHERE THEN
  170. M PUT_DOWN_LTHAND
  171. }
  172. { LEX_PUT_DOWN_RTHAND
  173. I @Ç¥ LEGALTODROPHERE THEN
  174. M PUT_DOWN_RTHAND
  175. }
  176.  
  177.  
  178.  
  179. //$ 26 - version number
  180.